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eef **]D**CPYNAM CRE 
ILE**] C vOe 

; 

; 

CCCCCCCC PPPPPPPP YY YY NN NN AAAAAA MM MM ; 
CCCCCCCC PPPPPPPP YY YY NN NN AAAAAA MM MM : 
cc PP PP YY YY NN NN AA AA MMMM MMMM $ 
cc PP PP YY YY NN NN AA AA MMMM MMMM 3 
cc PP PP yy yy NNNN NN AA AA MM MM OMM 3 
cc PP PP YY yy NNNN NN AA AA MM OM ; 
cc PPPPPPPP YY NN NN NN AA AA MM MM é 
cc PPPPPPPP YY NN NN NN AA AA MM MM 3 
cc Pp YY NN NNNN AAAAAAAAAA MM MM F 
cc PP YY NN NNNN AAAAAAAAAA (MM MM : 
cc PP YY NN NN AA AA MM MM iiiee * 
cc PP YY NN NN AA AA MM MM shee | . 
CCCCCCCC OPP YY NN NN AA AA MM MM oun « 
CCCCCCCC «OPP YY NN NN AA AA MM MM onne ; 

| ; 

LL T1111] SSSSSSSS 3 
LL II1111] SSSSSSSS : 
LL I] SS : 
LL I] $s : 
LL I] SS $ 
LL I] ss $ 
Li 1] SSSSSS 3 
LL I] SSSSSS 3 
LL Il SS $ 
LL I] $S 3 
LL II SS F 
LL I] SS $ 
LLLLLLLLLL III] SSSSSSSS 3 
LLLLLLLLLL II11491 SSSSSSSS ° 
4 

} Py 


; 1 1 MODULE CPYNAM ( 

3 § ¢ LANGUAGE COL 15839) « 

; IDENT = ‘V04-000 

s 4 )= 

; 5 5 BEGIN 

Pui 007 1: 

3 8 Gog8 : SQRRRAR AAA AE AAA AAAAAAAAAERAAAAERERAAAATEREREA ARTE AAAAAETEAAEKEAEAReAAAeS 
$ 'e 

>), a 010 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY * 
Tak 011 1 !* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * 
: 1 \¢ ; * ALL RIGHTS RESERVED. . 
: 14 014 1 i® THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
3 15 015 1 !* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 
3 16 B28 1 '® INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
5 17 001 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
3 18 Bo18 1 !® OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
5 i 84 : ‘* TRANSFERRED. * 
3 ‘* * 
; $3 8° 1 1 !®* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
3 ¢ 0 ; 1 !'* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
: $7 83 Z : c CORPORATION. : 
: 25 0025 1 '* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
3 $$ 0026 1 !* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 
3 2 4 7 1 Se * 
5 28 8 1! & 
: , 534 : SRR REAR RAE AR AAA AEREAEAE EAE RERAERE RARE AATRAAEAAARREAHAAEAAA AEE 
: 31 0031 1 !++ 

3 ¢ oO 38 1! 

: O08 ! FACILITY: F11IACP Structure Level 1 

co 0035 1 | ABSTRACT: 

3 6 0036 1! 

: 7 0037 1! This routine copies the file name string in the buffer descriptor 

.- 0038 1! acket into the result name string, if present. This routine must 

; FV 0039 1! e called in kernel mode. 

; 6 0040 1! 

; 6) 0041 1 ! ENVIRONMENT: 

3 $g BReg 7 | : 

; 4 0045 1! STARLET operating system, including privileged system services 

: 44 44 1! and internal exec routines. 

; 65 045 1! 

is oF i 

> 48 $068 1: 

; $3 Oep ' : AUTHOR: Andrew C. Goldstein, CREATION DATE: 6=-Jun-1978 1:45 

.* a 051 i MODIFIED BY: 

; 38 0088 1! A0100 ACG0001 _ _ Andrew C. Goldstein, 10-Oct-1978 20:01 

3 : 0085 ’ Previous revision history moved to F11A.REV 

; 5 056 | iee 

; 0057 #1 
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GLOBAL ROUTINE COPY_NAME (ABD) = 

14 

! 

i FUNCTIONAL DESCRIPTION: 

This routine copies the file name string in the buffer descriptor 


acket into the result name string, if present. This routine must 
e called in kernel mode. 


CALLING SEQUENCE: 
COPY_NAME (ARG1) 


INPUT PARAMETERS: 
ARG1: address of buffer descriptor packet 


IMPLICIT INPUTS: 
NONE 

OUTPUT PARAMETERS: 
NONE 

IMPLICIT OUTPUTS: 
NONE 

ieee VALUE : 


SIDE EFFECTS: 
buffer packet altered 


ABD : REF BBLOCKVECTOR C,ABDSC_LENGTH]; ! buffer packet arg 
CHSCOPY (.ABDCABDSC_NAME, ABDSW COUNT, 
ABDCABDSC_NAME, ABDSW_TEXT) + .ABDCABDSC_NAME, ABDSW_TEXT] + 1, 
;Appcaspsc RES, ABD$W_COUNT), 
ABD ABDSC_RES, ABD$W_TEXT] + .ABDCABDSC_RES, ABDSW_TEXT] + 1 
IF, ABDCABDSC_RESL., ABDS$W_COUNT] GEQ 2 


(ABDC AROSE RESL, ABDSW_TEXT) + .ABDCABDSC_RESL, ABDSW_TEXT] + 1)<0,16> 
= .ABDCABDSC_NAME, ABDSW_COUNT]; 


RETURN 1; 
END; ! end of routine COPY_NAME 


:4 VAX-11 Bliss-32 V4,0-742 


K 12 
16-Sep-1984 : a 
19-80-1382 99:38:3 DISKSVMSMASTER:LF 1A.SRCICPYNAM.B32:1 > (2). 


ra 


| 
CPYNAM 18-36 $ep-1984 VAX-11 Bliss-32 V4.0-742 4 
v04-000 ~307} 38% 99: 36 $2 DISKSVMSMASTER:CF11A.SRCICPYNAM.B32; (29 "2 
TITLE 
el 


DENT (v04-000\ | 
| 
| 


-PSECT SCODES,NOWRT,2 


0076 0 .ENTRY COPY_NAME, Save R2,R3,R4,R5,R6 : 0375 
56 04 Ac 0 MOVL AB Re > 0415 | 
21 1 A6 3C MOVZWL gc (RO), + 0416 
0 20 Abd 3C O000A MOVZWL Rd + 0419 

22 Ab 00 11 A146 } rons ¢ sa0t> movcsS 1 (hen? 17(R1)CR6], #0, 34(R6), 33(RO)CR6] : 
02 1A AB Bi OOOIA CMPW = - 26 (R6),, #2 + 0422 

OC 1F OOO1E BLSSU_1$ : 
50 18 AB 3C 00020 MOVZWL 34 (RG) RO + 0424 
19 A046 9F 00024 PUSHAB 25(RO)CR6] + 0425 

9E 12 A6 BO 00028 MOVW  18(R6), a(SP)+ : 
50 01 00 900 C 1$: MOVL #1, RO + 0427 
04 0002F RET + 0429 


; Routine Size: 48 bytes, Routine Base: $CODE$ + 0000 


117 30 1 
; 118 0431 1 END 
119 0432 0 ELUDOM 


H PSECT SUMMARY 
: Name Bytes Attributes 
: $CODES 48 NOVEC,NOWRT, RD, EXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) 


Library Statistics 


; ot i ee ee ee a ee Syake|s soonesee Pages Processing 
3 File Total Loaded Percent Mapped Time | 
; _$255$DUA28:(SYSLIBILIB.L32;1 18619 7 0 1000 00:01.9 


: COMMAND QUALIFIERS 


If: gen-138 99:36:32 NIEcdumGmASTERSCH TiAcoReacPYNAM.a32:1°%° (23 
BLISS/CHECK=(FIELD, INITIAL OPTIMIZE) /LIS=L1S$:CPYNAM/OBJ=0BJ$:CPYNAM MSRCS:CPYNAM/UPDATE=(ENHS: CPYNAM) 


; Size: 48 + 0 data bytes 
: Run "tee: O 8 
: F yepeee Time: :18. 

; Lines/CPU Min: 4 

3 tenenes/CPU-Rin: 14697 

; ry Used: 64 pages 

Compilation Complete 
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